(edmacro-parse-keys): Fix last change to omit macros of the <<foo>>

form.

diff --git a/lisp/edmacro.el b/lisp/edmacro.el
index be948ad579f690bab13a2420ea866de444689a9a..29f996760628f0799a41c1b30429aa8b521cfe26 100644 (file)
--- a/lisp/edmacro.el
+++ b/lisp/edmacro.el
@@ -697,7 +697,7 @@ This function assumes that the events can be stored in a string."
             (times 1)
             key)
        ;; Try to catch events of the form "<as df>".
-       (if (string-match "^<[^ >\t\n\f][^>\t\n\f]*>" word)
+       (if (string-match "^<[^ <>\t\n\f][^>\t\n\f]*>" word)
            (setq word (match-string 0 word)
                  pos (+ word-beg (match-end 0)))
          (setq word (substring string word-beg word-end)